home *** CD-ROM | disk | FTP | other *** search
/ IBM InfoROM for OS/2 Beta 1995 January / IBM InfoROM for OS2 Beta 1-1995.ISO / testcert / inputout / function / parallel / parallel.gra < prev    next >
Encoding:
Text File  |  1994-08-04  |  5.5 KB  |  145 lines
  1. *******************************************************************************
  2. ** PARALLEL.GRA - CALLS FOR PARALLEL PORT IOCTLS
  3. *******************************************************************************
  4. @IMPORT GLOBAL.GRA
  5. **
  6. **  Open given parallel port.
  7. **
  8. PARA_OPEN               $DLL=DDTPARA                            \
  9.                         $FUNC=@Para_Open$qr8Kwd_List            \
  10.                         DEVICENAME=STRING                       \
  11.                         $EXPECTED                               \
  12.                         DRIVEHANDLE=NUM
  13. **
  14. ** Close opend parallel port.
  15. **
  16. PARA_CLOSE              $DLL=DDTPARA                            \
  17.                         $FUNC=@Para_Close$qr8Kwd_List           \
  18.                         DRIVEHANDLE=NUM
  19. **
  20. ** Bidi Port only - Set communication mode.
  21. **
  22. BIDI_SETCOMMODE         $DLL=DDTPARA                            \
  23.                         $FUNC=@Bidi_SetComMode$qr8Kwd_List      \
  24.                         DRIVEHANDLE=NUM                         \
  25.                         COMMODE=NUM
  26. **
  27. ** Bidi Port only - Query Communication mode.
  28. **
  29. BIDI_QCOMMODE           $DLL=DDTPARA                            \
  30.                         $FUNC=@Bidi_QComMode$qr8Kwd_List        \
  31.                         DRIVEHANDLE=NUM
  32. **
  33. ** Bidi Port only - Set read timeout.
  34. **
  35. BIDI_SETRDTIMEOUT       $DLL=DDTPARA                            \
  36.                         $FUNC=@Bidi_SetRdTimeOut$qr8Kwd_List    \
  37.                         DRIVEHANDLE=NUM                         \
  38.                         RDTIMEOUT=NUM
  39. **
  40. ** Bidi Port only - Query read timeout.
  41. **
  42. BIDI_QRDTIMEOUT         $DLL=DDTPARA                            \
  43.                         $FUNC=@Bidi_QRdTimeOut$qr8Kwd_List      \
  44.                         DRIVEHANDLE=NUM
  45. **
  46. ** Bidi Port only - Query device.
  47. **
  48. BIDI_QDEVICE            $DLL=DDTPARA                            \
  49.                         $FUNC=@Bidi_QDeviceID$qr8Kwd_List       \
  50.                         DRIVEHANDLE=NUM
  51. **
  52. ** Set Frame Control.  (Characters per line, Lines per inch.).
  53. **
  54. PARA_SETFSTRL           $DLL=DDTPARA                            \
  55.                         $FUNC=@Para_SetFrameCtrl$qr8Kwd_List    \
  56.                         DRIVEHANDLE=NUM                         \
  57.                         CPL=NUM                                 \
  58.                         LPI=NUM                                 
  59. **
  60. ** Set Infinite Retry - On/Off. (0=OFF, 1=ON)
  61. **
  62. PARA_SETRETRY           $DLL=DDTPARA                            \
  63.                         $FUNC=@Para_SetInfinRetry$qr8Kwd_List   \
  64.                         DRIVEHANDLE=NUM                         \
  65.                         RETRY=NUM
  66. **
  67. ** Initialize parallel port.
  68. **
  69. PARA_INIT               $DLL=DDTPARA                            \
  70.                         $FUNC=@Para_InitParllPort$qr8Kwd_List   \
  71.                         DRIVEHANDLE=NUM
  72. **
  73. ** Activate font.
  74. **
  75. PARA_AFONT              $DLL=DDTPARA                            \
  76.                         $FUNC=@Para_ActivateFont$qr8Kwd_List    \
  77.                         DRIVEHANDLE=NUM                         \
  78.                         CODEPAGE=NUM                            \
  79.                         FONTID=NUM
  80. **
  81. ** Set Job Title.
  82. **
  83. PARA_SETTITLE           $DLL=DDTPARA                            \
  84.                         $FUNC=@Para_SetPrtJobTitle$qr8Kwd_List  \
  85.                         DRIVEHANDLE=NUM                         \
  86.                         JOBTITLE=STRING
  87. **
  88. ** Set Write time-out.
  89. **
  90. PARA_SETWRTTIMEOUT      $DLL=DDTPARA                            \
  91.                         $FUNC=@Para_SetPPWrtTimeOut$qr8Kwd_List \
  92.                         DRIVEHANDLE=NUM                         \
  93.                         PPWRTTIMEOUT=NUM
  94. **
  95. ** Query Frame control. (Characters per line and Lines per inch.)
  96. **
  97. PARA_QFCTRL             $DLL=DDTPARA                            \
  98.                         $FUNC=@Para_QFrameCtrl$qr8Kwd_List      \
  99.                         DRIVEHANDLE=NUM                         
  100.                         
  101. **
  102. ** Query Infinite Retry. 
  103. **
  104. PARA_QRETRY             $DLL=DDTPARA                            \
  105.                         $FUNC=@Para_QInfinRetry$qr8Kwd_List     \
  106.                         DRIVEHANDLE=NUM
  107. **
  108. ** Query Port.
  109. **
  110. PARA_QPORT              $DLL=DDTPARA                            \
  111.                         $FUNC=@Para_QParllPort$qr8Kwd_List      \
  112.                         DRIVEHANDLE=NUM
  113. **
  114. ** Query Active Font.
  115. **
  116. PARA_QAFONT             $DLL=DDTPARA                            \
  117.                         $FUNC=@Para_QActiveFont$qr8Kwd_List     \
  118.                         DRIVEHANDLE=NUM
  119. **
  120. **  Verify Font.
  121. **
  122. PARA_VFONT              $DLL=DDTPARA                            \
  123.                         $FUNC=@Para_VerifyFont$qr8Kwd_List      \
  124.                         DRIVEHANDLE=NUM                         \
  125.                         CODEPAGE=NUM                            \
  126.                         FONTID=NUM
  127. **
  128. **
  129. **
  130. PARA_QWRTTIMEOUT        $DLL=DDTPARA                            \
  131.                         $FUNC=@Para_QPPWrtTimeOut$qr8Kwd_List   \
  132.                         DRIVEHANDLE=NUM
  133. **
  134. **
  135. **
  136. PARA_READFILE           $DLL=DDTPARA                            \
  137.                         $FUNC=@Para_ReadFile$qr8Kwd_List        \
  138.                         DRIVEHANDLE=NUM
  139. **
  140. **
  141. **
  142. PARA_WRITEFILE          $DLL=DDTPARA                            \
  143.                         $FUNC=@Para_WriteFile$qr8Kwd_List       \
  144.                         DRIVEHANDLE=NUM
  145.